home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 8 / The Arsenal Files Collection #8 (Arsenal Computer) (1996).ISO / g_quake / godelqc5.zip / WORLD.QC < prev    next >
Text File  |  1996-09-24  |  12KB  |  405 lines
  1.  
  2.  
  3. void() main =
  4. {
  5.     dprint ("main function\n");
  6.     
  7. // these are just commands the the prog compiler to copy these files
  8.  
  9.     precache_file ("progs.dat");
  10.     precache_file ("gfx.wad");
  11.     precache_file ("quake.rc");
  12.     precache_file ("default.cfg");
  13.  
  14.     precache_file ("end1.bin");
  15.     precache_file2 ("end2.bin");
  16.  
  17.     precache_file ("demo1.dem");
  18.     precache_file ("demo2.dem");
  19.     precache_file ("demo3.dem");
  20.  
  21. //
  22. // these are all of the lumps from the cached.ls files
  23. //
  24.     precache_file ("gfx/palette.lmp");
  25.     precache_file ("gfx/colormap.lmp");
  26.  
  27.     precache_file2 ("gfx/pop.lmp");
  28.  
  29.     precache_file ("gfx/complete.lmp");
  30.     precache_file ("gfx/inter.lmp");
  31.  
  32.     precache_file ("gfx/ranking.lmp");
  33.     precache_file ("gfx/vidmodes.lmp");
  34.     precache_file ("gfx/finale.lmp");
  35.     precache_file ("gfx/conback.lmp");
  36.     precache_file ("gfx/qplaque.lmp");
  37.  
  38.     precache_file ("gfx/menudot1.lmp");
  39.     precache_file ("gfx/menudot2.lmp");
  40.     precache_file ("gfx/menudot3.lmp");
  41.     precache_file ("gfx/menudot4.lmp");
  42.     precache_file ("gfx/menudot5.lmp");
  43.     precache_file ("gfx/menudot6.lmp");
  44.  
  45.     precache_file ("gfx/menuplyr.lmp");
  46.     precache_file ("gfx/bigbox.lmp");
  47.     precache_file ("gfx/dim_modm.lmp");
  48.     precache_file ("gfx/dim_drct.lmp");
  49.     precache_file ("gfx/dim_ipx.lmp");
  50.     precache_file ("gfx/dim_tcp.lmp");
  51.     precache_file ("gfx/dim_mult.lmp");
  52.     precache_file ("gfx/mainmenu.lmp");
  53.     
  54.     precache_file ("gfx/box_tl.lmp");
  55.     precache_file ("gfx/box_tm.lmp");
  56.     precache_file ("gfx/box_tr.lmp");
  57.     
  58.     precache_file ("gfx/box_ml.lmp");
  59.     precache_file ("gfx/box_mm.lmp");
  60.     precache_file ("gfx/box_mm2.lmp");
  61.     precache_file ("gfx/box_mr.lmp");
  62.     
  63.     precache_file ("gfx/box_bl.lmp");
  64.     precache_file ("gfx/box_bm.lmp");
  65.     precache_file ("gfx/box_br.lmp");
  66.     
  67.     precache_file ("gfx/sp_menu.lmp");
  68.     precache_file ("gfx/ttl_sgl.lmp");
  69.     precache_file ("gfx/ttl_main.lmp");
  70.     precache_file ("gfx/ttl_cstm.lmp");
  71.     
  72.     precache_file ("gfx/mp_menu.lmp");
  73.     
  74.     precache_file ("gfx/netmen1.lmp");
  75.     precache_file ("gfx/netmen2.lmp");
  76.     precache_file ("gfx/netmen3.lmp");
  77.     precache_file ("gfx/netmen4.lmp");
  78.     precache_file ("gfx/netmen5.lmp");
  79.     
  80.     precache_file ("gfx/sell.lmp");
  81.     
  82.     precache_file ("gfx/help0.lmp");
  83.     precache_file ("gfx/help1.lmp");
  84.     precache_file ("gfx/help2.lmp");
  85.     precache_file ("gfx/help3.lmp");
  86.     precache_file ("gfx/help4.lmp");
  87.     precache_file ("gfx/help5.lmp");
  88.  
  89.     precache_file ("gfx/pause.lmp");
  90.     precache_file ("gfx/loading.lmp");
  91.  
  92.     precache_file ("gfx/p_option.lmp");
  93.     precache_file ("gfx/p_load.lmp");
  94.     precache_file ("gfx/p_save.lmp");
  95.     precache_file ("gfx/p_multi.lmp");
  96.  
  97. // sounds loaded by C code
  98.     precache_sound ("misc/menu1.wav");
  99.     precache_sound ("misc/menu2.wav");
  100.     precache_sound ("misc/menu3.wav");
  101.  
  102.     precache_sound ("ambience/water1.wav");
  103.     precache_sound ("ambience/wind2.wav");
  104.  
  105. // shareware
  106.     precache_file ("maps/start.bsp");
  107.  
  108.     precache_file ("maps/e1m1.bsp");
  109.     precache_file ("maps/e1m2.bsp");
  110.     precache_file ("maps/e1m3.bsp");
  111.     precache_file ("maps/e1m4.bsp");
  112.     precache_file ("maps/e1m5.bsp");
  113.     precache_file ("maps/e1m6.bsp");
  114.     precache_file ("maps/e1m7.bsp");
  115.     precache_file ("maps/e1m8.bsp");
  116.  
  117. // registered
  118.     precache_file2 ("gfx/pop.lmp");
  119.  
  120.     precache_file2 ("maps/e2m1.bsp");
  121.     precache_file2 ("maps/e2m2.bsp");
  122.     precache_file2 ("maps/e2m3.bsp");
  123.     precache_file2 ("maps/e2m4.bsp");
  124.     precache_file2 ("maps/e2m5.bsp");
  125.     precache_file2 ("maps/e2m6.bsp");
  126.     precache_file2 ("maps/e2m7.bsp");
  127.  
  128.     precache_file2 ("maps/e3m1.bsp");
  129.     precache_file2 ("maps/e3m2.bsp");
  130.     precache_file2 ("maps/e3m3.bsp");
  131.     precache_file2 ("maps/e3m4.bsp");
  132.     precache_file2 ("maps/e3m5.bsp");
  133.     precache_file2 ("maps/e3m6.bsp");
  134.     precache_file2 ("maps/e3m7.bsp");
  135.  
  136.     precache_file2 ("maps/e4m1.bsp");
  137.     precache_file2 ("maps/e4m2.bsp");
  138.     precache_file2 ("maps/e4m3.bsp");
  139.     precache_file2 ("maps/e4m4.bsp");
  140.     precache_file2 ("maps/e4m5.bsp");
  141.     precache_file2 ("maps/e4m6.bsp");
  142.     precache_file2 ("maps/e4m7.bsp");
  143.     precache_file2 ("maps/e4m8.bsp");
  144.  
  145.     precache_file2 ("maps/end.bsp");
  146.  
  147.     precache_file2 ("maps/dm1.bsp");
  148.     precache_file2 ("maps/dm2.bsp");
  149.     precache_file2 ("maps/dm3.bsp");
  150.     precache_file2 ("maps/dm4.bsp");
  151.     precache_file2 ("maps/dm5.bsp");
  152.     precache_file2 ("maps/dm6.bsp");
  153.  
  154. };
  155.  
  156.  
  157. entity  lastspawn;
  158.  
  159. //=======================
  160. /*QUAKED worldspawn (0 0 0) ?
  161. Only used for the world entity.
  162. Set message to the level name.
  163. Set sounds to the cd track to play.
  164.  
  165. World Types:
  166. 0: medieval
  167. 1: metal
  168. 2: base
  169. */
  170. //=======================
  171. void() worldspawn =
  172. {
  173.     lastspawn = world;
  174. //    Godel qc: took out InitBodyQue to implement gibbing timed corpses.
  175.  
  176. // custom map attributes
  177.     if (self.model == "maps/e1m8.bsp")
  178.         cvar_set ("sv_gravity", "100");
  179.     else
  180.         cvar_set ("sv_gravity", "800");
  181.     world_flag = 3;
  182.     world_hill = 0;
  183.         
  184. // the area based ambient sounds MUST be the first precache_sounds
  185.  
  186. // player precaches     
  187.     W_Precache ();                  // get weapon precaches
  188.  
  189. // sounds used from C physics code
  190.     precache_sound ("demon/dland2.wav");            // landing thud
  191.     precache_sound ("misc/h2ohit1.wav");            // landing splash
  192.  
  193. // setup precaches allways needed
  194.     precache_sound ("items/itembk2.wav");           // item respawn sound
  195.     precache_sound ("player/plyrjmp8.wav");         // player jump
  196.     precache_sound ("player/land.wav");                     // player landing
  197.     precache_sound ("player/land2.wav");            // player hurt landing
  198.     precache_sound ("player/drown1.wav");           // drowning pain
  199.     precache_sound ("player/drown2.wav");           // drowning pain
  200.     precache_sound ("player/gasp1.wav");            // gasping for air
  201.     precache_sound ("player/gasp2.wav");            // taking breath
  202.     precache_sound ("player/h2odeath.wav");         // drowning death
  203.  
  204.     precache_sound ("misc/talk.wav");                       // talk
  205.     precache_sound ("player/teledth1.wav");         // telefrag
  206.     precache_sound ("misc/r_tele1.wav");            // teleport sounds
  207.     precache_sound ("misc/r_tele2.wav");
  208.     precache_sound ("misc/r_tele3.wav");
  209.     precache_sound ("misc/r_tele4.wav");
  210.     precache_sound ("misc/r_tele5.wav");
  211.     precache_sound ("weapons/lock4.wav");           // ammo pick up
  212.     precache_sound ("weapons/pkup.wav");            // weapon up
  213.     precache_sound ("items/armor1.wav");            // armor up
  214.     precache_sound ("weapons/lhit.wav");            //lightning
  215.     precache_sound ("weapons/lstart.wav");          //lightning start
  216.     precache_sound ("items/damage3.wav");
  217.  
  218.     precache_sound ("misc/power.wav");                      //lightning for boss
  219.  
  220. // player gib sounds
  221.     precache_sound ("player/gib.wav");                      // player gib sound
  222.     precache_sound ("player/udeath.wav");           // player gib sound
  223.     precache_sound ("player/tornoff2.wav");         // gib sound
  224.  
  225. // player pain sounds
  226.  
  227.     precache_sound ("player/pain1.wav");
  228.     precache_sound ("player/pain2.wav");
  229.     precache_sound ("player/pain3.wav");
  230.     precache_sound ("player/pain4.wav");
  231.     precache_sound ("player/pain5.wav");
  232.     precache_sound ("player/pain6.wav");
  233.  
  234. // player death sounds
  235.     precache_sound ("player/death1.wav");
  236.     precache_sound ("player/death2.wav");
  237.     precache_sound ("player/death3.wav");
  238.     precache_sound ("player/death4.wav");
  239.     precache_sound ("player/death5.wav");
  240.  
  241. // ax sounds    
  242.     precache_sound ("weapons/ax1.wav");                     // ax swoosh
  243.     precache_sound ("player/axhit1.wav");           // ax hit meat
  244.     precache_sound ("player/axhit2.wav");           // ax hit world
  245.  
  246.     precache_sound ("player/h2ojump.wav");          // player jumping into water
  247.     precache_sound ("player/slimbrn2.wav");         // player enter slime
  248.     precache_sound ("player/inh2o.wav");            // player enter water
  249.     precache_sound ("player/inlava.wav");           // player enter lava
  250.     precache_sound ("misc/outwater.wav");           // leaving water sound
  251.  
  252.     precache_sound ("player/lburn1.wav");           // lava burn
  253.     precache_sound ("player/lburn2.wav");           // lava burn
  254.  
  255.     precache_sound ("misc/water1.wav");                     // swimming
  256.     precache_sound ("misc/water2.wav");                     // swimming
  257.  
  258.     precache_model ("progs/player.mdl");
  259.     precache_model ("progs/eyes.mdl");
  260.     precache_model ("progs/h_player.mdl");
  261.     precache_model ("progs/h_mega.mdl");
  262.     precache_model ("progs/m_g_key.mdl");
  263.     precache_model ("progs/m_s_key.mdl");
  264.     precache_model ("progs/w_g_key.mdl");
  265.     precache_model ("progs/w_s_key.mdl");
  266.     precache_model2 ("progs/end4.mdl");
  267.     precache_model ("progs/gib1.mdl");
  268.     precache_model ("progs/gib2.mdl");
  269.     precache_model ("progs/gib3.mdl");
  270.  
  271.     precache_model ("progs/s_bubble.spr");  // drowning bubbles
  272.     precache_model ("progs/s_explod.spr");  // sprite explosion
  273.  
  274.     precache_model ("progs/v_axe.mdl");
  275.     precache_model ("progs/v_shot.mdl");
  276.     precache_model ("progs/v_nail.mdl");
  277.     precache_model ("progs/v_rock.mdl");
  278.     precache_model ("progs/v_shot2.mdl");
  279.     precache_model ("progs/v_nail2.mdl");
  280.     precache_model ("progs/v_rock2.mdl");
  281.  
  282.     precache_model ("progs/bolt.mdl");              // for lightning gun
  283.     precache_model ("progs/bolt2.mdl");             // for lightning gun
  284.     precache_model ("progs/bolt3.mdl");             // for boss shock
  285.     precache_model ("progs/lavaball.mdl");  // for testing
  286.     
  287.     precache_model ("progs/missile.mdl");
  288.     precache_model ("progs/grenade.mdl");
  289.     precache_model ("progs/spike.mdl");
  290.     precache_model ("progs/s_spike.mdl");
  291.     precache_model ("progs/laser.mdl");
  292.     precache_model ("progs/w_spike.mdl");
  293.     precache_model ("progs/backpack.mdl");
  294.     precache_model ("progs/zom_gib.mdl");
  295.     precache_model ("progs/v_light.mdl");
  296.  
  297. //
  298. // Setup light animation tables. 'a' is total darkness, 'z' is maxbright.
  299. //
  300.  
  301.     // 0 normal
  302.     lightstyle(0, "m");
  303.     
  304.     // 1 FLICKER (first variety)
  305.     lightstyle(1, "mmnmmommommnonmmonqnmmo");
  306.     
  307.     // 2 SLOW STRONG PULSE
  308.     lightstyle(2, "abcdefghijklmnopqrstuvwxyzyxwvutsrqponmlkjihgfedcba");
  309.     
  310.     // 3 CANDLE (first variety)
  311.     lightstyle(3, "mmmmmaaaaammmmmaaaaaabcdefgabcdefg");
  312.     
  313.     // 4 FAST STROBE
  314.     lightstyle(4, "mamamamamama");
  315.     
  316.     // 5 GENTLE PULSE 1
  317.     lightstyle(5,"jklmnopqrstuvwxyzyxwvutsrqponmlkj");
  318.     
  319.     // 6 FLICKER (second variety)
  320.     lightstyle(6, "nmonqnmomnmomomno");
  321.     
  322.     // 7 CANDLE (second variety)
  323.     lightstyle(7, "mmmaaaabcdefgmmmmaaaammmaamm");
  324.     
  325.     // 8 CANDLE (third variety)
  326.     lightstyle(8, "mmmaaammmaaammmabcdefaaaammmmabcdefmmmaaaa");
  327.     
  328.     // 9 SLOW STROBE (fourth variety)
  329.     lightstyle(9, "aaaaaaaazzzzzzzz");
  330.     
  331.     // 10 FLUORESCENT FLICKER
  332.     lightstyle(10, "mmamammmmammamamaaamammma");
  333.  
  334.     // 11 SLOW PULSE NOT FADE TO BLACK
  335.     lightstyle(11, "abcdefghijklmnopqrrqponmlkjihgfedcba");
  336.     
  337.     // styles 32-62 are assigned by the light program for switchable lights
  338.  
  339.     // 63 testing
  340.     lightstyle(63, "a");
  341. };
  342.  
  343. void() StartFrame =
  344. {
  345.     teamplay = cvar("teamplay");
  346.     deathmatch = cvar("deathmatch");
  347.     skill = cvar("skill");
  348.     framecount = framecount + 1;
  349. };
  350.  
  351. /*
  352. ==============================================================================
  353.  
  354. BODY QUE
  355.  
  356. ==============================================================================
  357. */
  358.  
  359. entity  bodyque_head;
  360.  
  361. void() bodyque =
  362. {       // just here so spawn functions don't complain after the world
  363.     // creates bodyques
  364. };
  365.  
  366.  
  367. // make a body que entry for the given ent so the ent can be
  368. // respawned elsewhere
  369. // changed by Godel qc mods so that bodies will gib after 2 minutes.
  370. void(entity ent) CopyToBodyQue =
  371. {
  372.     local entity body;
  373.     body=spawn();
  374.     body.owner=ent;
  375.     body.angles = ent.angles;
  376.     body.model = ent.model;
  377.     body.modelindex = ent.modelindex;
  378.     body.skin = ent.skin;
  379.     body.frame = ent.frame;
  380.     body.colormap = ent.colormap;
  381.     body.movetype = ent.movetype;
  382.     body.velocity = ent.velocity;
  383.     body.flags = 0;
  384.     body.classname = "body";
  385.     body.touch=SUB_Null;
  386.     if (self.model=="progs/player.mdl"){
  387.         body.nextthink=time+60;
  388.         body.think=SUB_Gib;
  389.     } else {
  390.         body.nextthink=time + (10 + random()*30)/numplayers;
  391.         body.think=SUB_Remove;
  392.     }
  393.     setorigin (body, ent.origin);
  394.     setsize (body, ent.mins, ent.maxs);
  395.     if(body.model=="progs/player.mdl"){
  396.         body.nextthink=time+120;
  397.         body.think=SUB_Gib;
  398.     } else {
  399.         body.nextthink=time+15*random();
  400.         body.think=SUB_Remove;
  401.     }
  402. };
  403.  
  404.  
  405.